home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / listbox / tbplus / tbplus.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1994-12-22  |  2.3 KB  |  44 lines
  1. Form1
  2. #Text Box Insert and Overstrike Demo
  3. Form15
  4. txt_TextBoxPlus
  5. lbl_IOMode
  6. Label3
  7. Insert or Overstrike mode:
  8. Label1
  9. The standard Visual Basic text box control is a very basic text box.  Normally, if you want multiple fonts, multiple tabs, multiple styles, or overstrike AND insert mode, you'd have to go commercial.  This is a demonstration of how you can implement both overstrike and insert mode.  It was written by Daniel Trimble and is placed in the Public Domain.  Do as you wish with this demo, but I, nor the distributers of this product (namely online services, vendors, or anyone else having anything to do with the distribution or reproduction of this demo) are at fault for anything.  Comments and questions and suggestions are always welcome, and can be emailed to the address DGTrimble@IFiveBBS@win.net. or to EFVE25D@prodigy.com.
  10. MS Sans Serif
  11. txt_TextBoxPlus_Change
  12. txt_TextBoxPlus_KeyPress
  13. KeyAscii
  14. txt_TextBoxPlus
  15.     SelLength
  16. InsertMode
  17. lbl_IOMode
  18. Caption
  19. txt_TextBoxPlus_KeyUp
  20. KeyCode
  21. Shift
  22. KEY_TAB
  23. KEY_INSERTs
  24. mdi_TextPad
  25.     StatusBar
  26. InsertStatus
  27. txt_ActiveDocument
  28. @    Form_Load
  29. screen
  30. Width
  31. Height
  32. txt_txt_TextBoxPlus
  33. Form_Load
  34. make Insert active on startupi
  35. centers the demo window on the screen
  36. txt_TextBoxPlus_KeyPress
  37. txt_TextBoxPlus_KeyUp
  38. Insert pressed?I
  39. was Insert active?
  40. yes, so make it inactive.  Now we're in overstrike modee
  41. nope, overstrike was activer
  42. make Insert mode active 
  43. display the new mode on the status lin
  44.